Xác định lỗi sai và sửa lại
a) Var X : Array [1;50] of integer;
b) Var X : Array [5..50.5] of real;
c) For i: 1,5 to 10 do write ('A');
d) For i: 1 to ; 10 do write ('A');
e) While x:=10 do x:=x+5;
a) if a>b then max:=a; else max:=b; |
b) var X: Array[5..10] Of Real; |
c) X:=10; while X:=10 do X := X+5; |
d) for i:=1.5 to 10 do m:=m + 1; e) if a>b then max:=a else max:=b; f) var X: Array[5.5..10] Of Real; g) X:=10; while X>10 do X := X+5; h) for i:=1.5 to 10 do m:=m + 1; III. Hãy viết các câu lệnh, khai báo theo yêu cầu sau: A. Khai báo mảng A gồm 50 phần tử thuộc kiểu dữ liệu số thực. B. Phần tử thứ 5 của mảng A được gán giá trị là 8. C. Khai báo mảng dayso gồm 50 phần tử thuộc kiểu dữ liệu số nguyên. D. Nhập giá trị cho phần tử thứ 2 trong mảng diem. IV. Bài tập Viết chương trình thực hiện các yêu cầu sau: a. Nhập điểm văn và điểm toán của n học sinh trong một lớp (n nhập từ bàn phím) b. Tính điểm trung bình của mỗi học sinh (kết quả lấy 1 chữ số thập phân) help với mai ktr ;-;
|
III:
A: var a:array[1..50]of real;
B: a[5]:=8;
C: var a:array[1..50]of integer;
D: readln(dem[2]);
câu | đúng | sai | nếu sai sửa lại cho đúng |
for i:=1 to 10 do writeln('A'); | |||
var X; Array[5...10] of char; | |||
X:=10;while X:=10 do X:=X+5; | |||
for i=1.5 to 10.3 do writeln('A'); |
For i:=1 to 10 do writeln('A'); Đúng
Var x; array[5...10]of char; Sai
Sửa lại: var x:array[5..10]of char;
Các khai báo biến mảng sau đây trong Pascal đúng hay sai:
a) var X: Array[10,13] Of Integer;
b) var X: Array[5..10.5] Of Real;
c) var X: Array[3.4..4.8] Of Integer;
d) var X: Array[10..1] Of Integer;
e) var X: Array[4..10] Of Real;
a, sai vì dấu "," phải được thay bằng ".."
b, c, sai vì chỉ số đầu và cuối đều phải kiểu nguyên
d, sai vì chỉ số đầu phải nhỏ hơn chỉ số cuối
e, đúng
Những câu lệnh sau đúng hay sai ? Giải thích vì sao?
a) If a> b then max:=a ; else max := b ;
b) Var X: Array [5...10 ] of real;
c)X:= 10 ; While X:= 10 do X:= X+5
d) For i := 1.5 to 10 do m := m+1 ;
Lời giải :
a) sai vì trước else không được chứa dấu ;
b) đúng
c) sai vì kết thúc x:=x+5 phải có dấu ;
d) sai vì trong vòng lặp for không có kiểu dữ liệu số thực
câu | đúng | sai | sửa lại cho đúng nếu sai |
for i:=1 to 10 do writeln('A') | |||
var X; Array[5...10] Of Char | |||
X:=10;while X:=10 do X:=X+5 | |||
for i=1.5 to 10.3 do writeln('A') |
a) thiếu dấu ; ở cuối
sửa: for i:=1 to 10 do writeln ('A');
b) sau X ko phải có; mà có : từ 5.. 10 có 2 dấu chấm dư 1 dấu
sửa: var X: array [5..10] of char;
b) thiếu dấu ; ở cuối câu lệnh
sửa: X:=10; while X=10 do X:=X+5;
d) giá trị đầu và gia trị cuối của câu lệnh phải là só nguyên
sửa: for i:=1 to 10 do writeln('A');
* Chữa sai thành đúng:
a, Var const:=2;b:=10;
b, Var thu_tu,so_luong:Integer;real;
c, For i:=1,5 to 10 do writeln ('A');
d, While x=10 do x=x+3;
e, Var A: array[1..100] of real;
g, If m>n; then m:=m-n
Mọi người ơi giúp mình được k ạ? Mình đang cần gấp huhu
Cách khai báo biến mảng sau đây đúng hay sai? Nếu sai giải thích tại sao?
a) Var X: Array[10 , 13] of real;
b) Var X: Array[3..4.8] of integer;
c) Var X: Array(10..1) of integer;
d) Var X: Array[-7..7] of integer;